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1.  INTRODUCTION 


This  project  addressed  one  aspect  of  mcHiitoring  nuclear  explosi(»s  in  a  given  area  using  a 
particular  set  of  seismic  stations.  To  evaluate  the  extent  to  which  a  given  set  of  stations  can  be 
used  to  monitor  ejqtlosions,  it  is  important  to  know  what  seismic  phases  can  be  observed  at  those 
stations  from  events  of  a  given  size  and  type  occurring  in  the  area  being  monitored.  It  is  possible 
to  obtain  a  preliminary  assessment  of  what  phases  could  be  recorded  at  a  given  station  by  analy^g 
phases  that  have  actually  been  reported  to  the  International  Seismological  Centre  (ISC)  as  part  of 
routine  monitoring  of  earthquakes  and  explosions.  Since  there  would  inevitably  be  questions 
regarding  the  completeness  and  reliability  of  phase  information  provided  by  staticm  operators  in  a 
foreign  country,  it  would  be  helpful  to  examine  in  advance  the  reporting  characteristics  any 
station  that  might  evenmally  be  used  in  a  treaty  verification  scenario.  This  type  of  informaticMi 
could  be  useful  for  estimating  how  clearly  a  given  seismic  phase  generated  by  a  nuclear  test  could 
be  recorded  at  a  given  station,  if  the  United  States  were  to  monitor  that  particular  station  for  that 
specific  phase. 

Most  of  the  work  for  this  project  involved  writing  ccxnputer  programs  to  create  database 
relations  for  seismic  phases  reported  by  stations  in  the  former  Soviet  Union.  These  programs, 
described  in  this  report,  read  data  extracted  from  the  ISC  computer  files  and  create  database 
relations  containing  ISC  phase  data  for  a  given  station.  These  relations  are  stored  in  conputer  files 
in  the  standardized  format  that  is  used  by  the  ORACLE  database  management  system  (DBMS) 
operating  at  the  Center  for  Seismic  Studies  (CSS,  see  Anderson  et  aL,  1990). 

There  are  168  seismic  stations  in  the  former  Soviet  Union  tfiat  are  described  in  a  report  by 
Shishkevish  (1974).  Of  tiiese  stations,  at  least  148  report  (or  have  previously  reported)  seismic 
phase  data  in  the  ISC  bulletins.  Figure  1  shows  the  locations  of  staticms  in  the  former  Soviet 
Union  that  we  have  been  able  to  identify  as  repotting  phase  data  to  the  ISC,  and  the  names  and 
locaticms  of  those  stations  are  listed  in  Table  1. 

The  ISC  data  have  been  recorded  on  a  CD-ROM,  and  software  is  available  to  extract  phase  data 
from  that  CD-ROM  (USGS/NEIC,  1990).  The  USGS/NEIC  program  that  extracts  phase  data 
fiom  the  CD-ROM  is  called  FAISE  (Fetch  Associated  Information  of  Seismic  Events).  Using  the 
FAISE  software  and  the  CD-ROM  as  a  starting  point,  we  extracted  phase  data  rq)orted  for  specific 
stations  in  the  fom^r  Soviet  Unitxi.  We  have  written  conqruter  programs  to  read  the  output  from 
FAISE,  and  translate  that  ouq)ut  inm  the  standardized  "external  format"  that  is  used  by  the  DBMS 
operating  at  the  C!SS. 
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2.  DATABASE  OF  SEISMIC  PHASES  REPORTED  FOR 
STATIONS  IN  THE  FORMER  SOVIET  UNION 


The  structure  of  the  database  used  at  the  Center  for  Seismic  Studies  (CSS)  is  described  by 
Anderstm  et  aL  (1990).  The  specific  database  relations  that  have  been  created  for  this  project  are 
arrival,  assoc,  event  and  origin.  The  information  contained  in  those  relations  is  summarized 
in  Tables  2-5.  The  programs  that  create  these  lelaticHis  fiom  die  FAISE  output  are  written  in  C, 
and  the  C  code  for  each  program  is  listed  in  Appendices  A-D  of  this  report  The  programs  call  the 
functions  listed  in  Appeiulix  £,  and  require  a  short  file  containing  input  information,  also  listed  in 
Appendix  E. 

While  the  results  presented  in  this  report  were  obtained  by  running  the  programs  on  a 
Macintosh  computer,  the  C  code  should  be  ctxnpletely  portable  to  other  computers.  We  have 
successfully  run  diese  programs  on  a  DEC-VAX  computer  operating  under  die  VMS  operating 
system,  as  well  as  on  several  IBM-PC  con^atible  conqiuters  operating  under  the  DOS  operating 
system.  In  aU  cases,  the  (xily  changes  that  were  necessary  were  very  minor  changes  to  die  C 
header  statements.  Since  the  FAISE  prpgram  runs  in  the  DOS  operating  system,  the  use  of  these 
programs  cm  a  DOS  conqiuta*  would  make  it  possible  to  effidendy  extract  the  necessary  data  for 
any  station  and  any  time  period  covered  by  the  ISC  CD-ROM  catalogue.  Although  these  programs 
were  originally  intended  to  be  used  for  stations  in  die  formo’  Soviet  Union,  they  can  of  course  be 
used  to  investigate  reporting  characteristics  of  stations  in  any  country. 

Using  the  months  of  January  1984  and  January  1986  and  the  statims  OBN  and  YAK  as 
exan^les,  we  illustrate  die  type  of  information  diat  is  contained  in  a  database  created  by  the 
programs  written  for  this  project  Figure  2  shows  all  events  in  the  ISC  Bulletin  (with  mb>0) 
reported  during  January  1984  and  January  1986.  Figure  3  shows  die  event  epicenters 
corresptxidmg  to  a  "station-phase"  catalogue  for  OBN  -  January  1986,  i.e.  all  events  for  which  at 
least  one  phase  was  reported  by  station  OBN  during  January  1986.  For  con^arison  with  Hgure 
3,  Figure  4  shows  epicenters  corresponding  to  the  station-phase  catalogue  for  YAK  -  January 
1986.  Station  OBN  only  reported  phases  for  events  within  the  former  Soviet  Union  and  immediate 
surrounding  areas.  YAK,  on  tte  other  hand,  reported  phases  not  cndy  from  events  within  and  in 
the  vicinity  of  the  fmma'  Soviet  Unicm,  but  also  from  events  in  the  western  United  States,  western 
South  America  and  die  soudiem  Atlantic  ocean.  This  diffnence  is  at  least  in  part  due  to  the  fact 
that  YAK  is  closer  to  those  particular  areas  in  the  Western  Hemisphere  than  OBN,  but  could  also 
be  due  to  differences  in  station  characteristcs  (e.g.  Iowa-  background  noise). 
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For  cfwTiparisnn  with  these  Soviet  station-phase  catalogues,  Hguies  5  and  6  show  epicenters 
conesponding  b)  the  station-phase  catalogues  for  two  United  States  statitxis,  BLA  -  January  1986 
and  GOL  -  January  1986,  respectively.  Also  for  a  comparison  with  the  month  of  January  1986, 
Figure  7  shows  epicenters  corresponding  to  the  station-phase  catalogue  for  OBN  -  January  1984. 

A  more  rifttailftri  description  of  the  differences  in  number  and  type  of  reported  phases  at  a  sartq>Ie  of 
Soviet  and  United  States  stations  is  given  below  in  Section  3  of  this  report 

Once  the  programs  for  all  of  the  relations  have  been  run  for  a  given  station  and  time  period,  tire 
data  can  be  read  into  the  DBMS.  For  the  examples  described  below,  we  used  tire  CORACLE  DBMS 
operating  on  a  Macintosh  conjurer.  The  commands  for  loading  the  data  into  the  DBMS  and 
creating  the  necessary  tables  are  written  in  the  Structured  Query  Language  (SQL).  Tables  6  and  7 
show  the  results  of  using  SQL  queries  to  extract  information  about  specific  phases  reported  by 
OBN  and  YAK  for  January  1986.  The  SQL  c<xnmand  that  generated  the  results  shown  in  Tables  6 
and  7  was: 

SELECT  ARRIVAL.STA,  EVNAME,  DELTA,  MB,  QUAL,  IPHASE 

FROM  ORIGIN,  ARRIVAL,  ASSOC,  EVENT 

WHERE  ARRIVAL.ARID  =  ASSOC.ARID 

AND  ASSOC.ORID  =  ORIGIN.ORID 

AND  ORIGIN  JaVID  =  EVENT£VID; 

In  the  next  secticHi,  we  test  the  software  developed  for  this  projea  by  ruruiing  the  programs  for 
several  examples  involving  selected  stations  in  the  former  Soviet  Unitm,  and  we  compare  those 
results  with  results  for  selected  statitxis  in  the  United  States.  These  examples  illustrate  the  type  of 
investigations  that  can  be  carried  out  using  the  DBMS  relations  created  by  the  programs. 


3.  DEMONSTRATION  OF  DATABASE  QUERIES: 

EXTRACTING  PHASE  INFORMATION  FOR  SELECTED  STATIONS 

IN  THE  SOVIET  UNION  AND  THE  UNITED  STATES 

In  this  section,  we  give  several  exarr^les  in  which  SQL  queries  are  used  to  extract  seismic 
phase  information  for  specific  time  periods  for  selected  Soviet  stations  (OBN,  YAK  and  NVS)  and 
for  selected  United  States  stations  (BLA,  GOL  and  ALQ).  Although  the  programs  written  for  this 
project  can  be  run  for  any  time  period  covered  by  the  ISC  data  base  (i.e.  January  1964  through 
August  1987),  we  use  one-month  time  segments  in  these  examples  because  the  number  of  phases 
repeated  in  a  lemger  period  of  time  can  result  in  quite  large  output  files.  For  exarr^rle,  information 
corresponding  to  199  phases  were  reported  by  ALQ  in  January  1984  alone.  Thus,  an  entire  year 
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could  produce  a  file  containing  infonnation  on  2,000  or  more  phases  for  sonx  stations,  and  a 
decade  could  prodiKe  a  file  containing  information  on  20,000  or  mme  phases.  In  routine  operation 
on  a  relatively  large  computer,  one  year  time  segments  are  probably  quite  reasonable  to  work  with, 
and  longer  time  segments  mi^t  be  2q)pn^)riatB  for  some  applications. 

Tables  8  and  9  show  the  results  of  executing  the  same  SQL  command  that  generated  the  results 
shown  in  Tables  6  and  7,  but  in  this  case  for  Uni^  States  stations  BLA  and  GOL,  respectively. 
The  coiiq>uter  programs  and  SQL  statements  described  in  this  report  were  tested  empirically  by 
comparing  the  results  of  running  a  database  search  with  informatitm  listed  in  the  corresponding 
"hard  copy”  ISC  Bulletin.  These  tests  revealed  no  obvious  errors  in  any  of  the  progranos  or  SQL 
statements.  As  an  example  of  such  an  enqnrical  test,  we  chose  SO  rows  at  random  fiom  the  output 
shown  in  Tables  6  through  9  and  con^ared  the  items  in  those  rows  witii  the  corresptmding  entries 
in  the  hard  copy  Bulletin.  Eveiy  item  chosen  in  tiiis  manner  fitxn  Tables  6  through  9  was  found  to 
be  identical  to  the  conesponding  entry  in  the  Bulletin. 

To  illustrate  the  type  of  analysis  that  can  be  <kme  once  the  database  has  been  created  and  loaded 
into  ORACLE,  we  executed  the  following  SQL  query  for  the  month  of  January  1986  at  stations 
OBN.  YAK,  NVS,  BLA,  GOL  and  ALQ. 

SELECT  IPHASE,  COUNT(*) 

FROM  ORIGIN,  ARRIVAL,  ASSOC,  EVENT 

WHERE  ARRIVALj\RID  =  ASSOC.ARID 

AND  ASSOCORID  =  ORIGIN.ORID 

AND  ORIGIN£VID  =  EVENT^VID; 

AND  ARRIVAL.STA  =  ASSOC.STA 

GROUP  BY  IPHASE; 

The  results  of  executing  this  command  are  shown  in  Table  10,  which  lists  the  number  of  times 
a  given  phase  was  reported  during  January  1986  at  stations  OBN,  YAK,  NVS,  BLA,  GOL  and 
ALQ.  Table  1 1  shows  the  same  infonnation  for  the  month  of  January  1984. 

Although  it  is  beyond  the  scope  of  tiiis  repon  K>  present  a  detailed  analysis  of  all  the 
information  that  could  be  extracted  for  the  Soviet  and  United  States  stations  using  the  database 
created  by  these  programs,  it  is  helpful  to  ctxitinue  our  simple  example  as  a  way  of  further 
illustrating  the  of  analysis  tiiat  can  be  done.  Note  in  Tables  10  and  1 1  for  example,  that  in 

both  January  1986  and  January  1984,  all  three  of  the  Soviet  stations  were  reporting  S  phases, 
while  only  one  S  phase  (at  ALQ  in  1984)  was  reported  for  all  three  United  States  stations.  Also, 
based  on  these  two  months,  it  appears  that  the  phase  pP  is  routinely  reported  by  OBN  and  YAK  in 
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the  forma'  Soviet  Unitm,  and  by  GOL  and  ALQ  in  the  United  States  However,  for  seme  reason 
pP  is  not  reported  by  NVS  and  BLA.  It  is  also  interesting  to  note  in  Tables  10  and  1 1  that  the  rado 
of  reported  PKP  phases  to  reported  P  phases  is  fairly  consistent  for  a  given  statioit 

While  the  pattern  of  reporting  from  the  Soviet  stations  is  quite  uniform  for  botii  noonths  and  all 
three  stations,  the  pattern  is  not  unifonn  from  one  United  States  statitm  to  the  next  Station  ALQ 
reported  many  more  phases  than  GOL,  and  BLA  repoarted  less  phases  than  any  of  the  other  United 
States  or  Soviet  statiems.  The  DBMS  can  be  used  to  investigate  what  might  be  the  cause(s)  of  such 
differences.  For  example.  Table  12  shows  the  results  of  executing  the  following  SQL  command 
for  the  GOL  -  January  1984  station-phase  data  base: 

SELECT  ARRIVAL.STA,  IPHASE,  EVNAME,  DELTA,  MB,  LAT,  LON 

FROM  ORIGIN,  ARRIVAL,  ASSOC,  EVENT 

WHERE  ARRIVAL.ARID  =  ASSOC.ARID 

AND  ASSOCORID  =  ORIGIN.ORID 

AND  ORIGIN.EVID  =  EVENT.EVID; 

AND  ARRIVAL.STA  =  ASSOC.STA 
AND  IPHASE  = 

ORDER  BY  DELTA; 

Executing  that  same  SQL  command  for  the  ALQ  •  January  1984  station-phase  data  base,  and 
comparing  the  output  with  that  shown  for  GOL  in  Table  12,  we  found  that  about  half  of  the 
difference  between  the  ouq)uts  for  GOL  and  ALQ  can  be  explained  by  the  fact  that  ALQ  reported 
many  more  foreshocks  and  aftershocks  of  a  given  event  than  GOL  did. 

As  a  final  illustration,  we  compare  the  reported  P  phases  for  NVS  versus  OBN  for  January 
1984.  This  was  acetmpUshed  by  executing  the  previous  SQL  command  (i.e.  corresponding  to  the 
discussion  of  Table  12)  for  both  stations,  and  comparing  the  output  The  results  are  illustrated  in 
Figure  8,  which  shows  events  for  which  P  waves  were  reported  by  NVS,  but  not  by  OBN  (Figure 
8a),  and  the  same  information  for  OBN  (Figure  8b).  While  one  might  have  expected  tiiat  the 
events  "seen"  by  NVS  and  not  by  OBN  would  be  located  in  very  different  areas  than  the  events 
seen  by  OBN  and  not  by  NVS,  it  is  interesting  to  note  that  the  geographical  distribution  of 
epicenters  in  Figure  8a  is  quite  similar  to  that  in  Figure  8b.  This  suggests  that,  for  the  most  part, 
the  phases  of  the  events  missed  by  NVS  but  reported  by  OBN  could  actually  be  found  on  the  NVS 
seismograms  (and  vice  versa).  Since  this  conclusion  is  based  on  geographical  distribution  alone, 
we  could  continue  this  analysis  by  using  the  DBMS  to  search  for  otha  event  parametos  (such  as 
mb,  ms  and  ml)  to  investigate  why  phases  reported  by  one  station  were  not  reported  by  the  other. 
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4.  CONCLUDING  REMARKS 


While  the  original  intent  of  this  project  was  to  develop  a  data  base  of  seismic  phases  reported 
by  stations  in  the  former  Soviet  Union,  the  programs  written  for  this  project  can  be  used  for  any 
station  that  reports  to  the  ISC.  This  makes  it  possible  to  obtain  a  preliminary  assessment  of  what 
phases  could  be  recorded  at  a  given  station  in  any  part  of  the  world  by  analyzing  phases  that  have 
actually  been  reported  as  part  of  routine  seismic  mixtitoring. 

The  programs  used  to  produce  the  relations  for  this  data  base  are  available  from  the  autiiOT, 
either  in  the  form  of  C  code  (in  ASCH  format)  written  on  an  IBM-PC  file,  or  (preferably)  by 
electronic  mail  Anyone  interested  in  obtaiiung  copies  of  these  programs  should  contact  the  author 
at  the  address  on  the  cover  page  of  this  report  or  at  KAFKA@BCVMS.BC.EDU. 
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Table  1 


Stations  in  the  Fonner  Soviet  Union  that  Report, 
or  Have  Previously  Reported,  Seismic  Phare  Data  to  the  ISC 

(Locations  and  precision  of  locations  are  from  Shishkevish,  1974.) 


Abastumani 

ABS 

41®45’N,  42“50E 

Caucasus 

AgDlyk 

AGL 

39.9‘’N,  66.9*^ 

Central  Asia 

AlchflUcalalri 

AKH 

4r24'N,  43°29E 

Caucasus 

Aha 

ALL 

54‘’42'N.  110®46E 

Baykal 

Alma-Ata 

AAA 

43‘’16‘N,  76®57E 

Central  Asia 

Alushta 

ALU 

44®42’N,  34®25E 

Crimea 

Andizhan 

ANR 

40®45'N,  72®22E 

Central  Asia 

Apakhonchich 

APN 

~56.0°N,  ~160.9®E 

Far  East 

Apatity 

APA 

67®33‘N,  33®20E 

Arctic 

Aral 

ARLS 

~4L4*N,  -73.9*^ 

Central  Asia 

Arshan 

ARS 

51®55*N,  102®30E 

Baykal 

Ashkhabad 

ASH 

37®57’N,  58°21E 

Kopet  Dag 

Avacha 

AVH 

53®04'N,  158*30E 

Far  East 

Baku 

BAK 

40®23’N,  49®54E 

Caucasus 

Bakuriani 

BKR 

41«44*N,  43®31E 

Caucasus 

Barguzin 

BGZ 

53®37'N,  109®37E 

Baykal 

Bodaybo 

BOD 

57®5rN,  114®11E 

Baykal 

Bodon 

BDN 

53*43’N,  U0°06’E 

Baykal 

Bogdanovka 

BGD 

41«16'N,  43®36E 

Caucasus 

Bogi-2^gon 

BZN 

-38.5®N,  ~69.8®E 

Central  Asia 

Chagan-Uzun 

CUR 

50®06'N,  88®21E 

Altay-Sayan 

Chagda 

CGD 

58*45?^,  130°37E 

Yakutiya 

Chara 

CRS 

56®54’N,  118®12E 

Baykal 

Chilik 

CHL 

43«34'N,  78®25E 

Central  Asia 

Chimkent 

CHM 

42®19'N,  69®36'E 

Central  Asia 

Chul'inan 

CLNS 

~56.9®N,  ~125‘E 

Yakutiya 

Chuyan-Garon 

CGT 

38®39'N,  69®10E 

(central  Asia 

Dushanbe 

DSH 

38®34’N,  68®46E 

Ontral  Asia 

Dusherti 

DUS 

42®05’N,  44®42E 

Caucasus 

Dzheiino 

DZE 

-38.7®N,  -68.5TE 

Central  Asia 

Dzhirgatal' 

DZT 

39®13'N,  7n4E 

Central  Asia 

Dzhiz^ 

DZI 

40.1®N,  67.8®E 

Central  Asia 

El'tsovka 

ELT 

53®15'N,  86®16E 

Altay-Sayan 

Erevan 

ERE 

40«11’N,  44®30'E 

Caucasus 

Eizin 

ERNS 

50°15'N,  95®10E 

Altay-Sayan 

Esso 

ESO 

55^5674,  158®42E 

Far  East 

Fabiichnaya 

FAB 

43®08*N,  76®26E 

Central  Asia 

Feodosiya 

FED 

45®0rN,  36®23E 

Crimea 

Fergana 

FRG 

40®23'N,  71®47E 

Central  Asia 

Frunze 

FRU 

42®50'N,  74®37E 

Central  Asia 

Gann 

GAM,  GAR 

39®00’N,  70®19E 

Central  Asia 

Gegechkori 

GEG 

42®21'N,  42®23E 

Caucasus 

Gori 

GOR 

41®59’N,  44‘’07E 

Caucasus 

Goris 

GRS 

39®30’N,  46®20E 

Caucasus 

Groznyy 

GRO 

43«19’N,  45®42E 

Caucasus 
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Table  1  (Continued) 


Idcutsk 

lul'tin 

Kabansk 

Kalaydasht 

Kara-Su 

Khaishi 

Khandyga 

Khapcheranga 

Kheys 

Khorog 

Kirovabad 

Kishinev 

Kizyl-Arvat 

Klyuchi 

Kosov 

Kozyrevsk 

Krasnovodsk 

Kronoki 

Krutoberegovo 

Kulyab 

Kumora 

Kuril'sk 

Kunnenty 

Kyakhta 

Lagodekhi 

Leninakan 

Lenkoran' 

L'vov 

Lyangar 

Magai^ 

Mal^hkala 

Malo-Kuril'sk 

Matoa 

Mezhgor'ye 

Mingechaur 

Mondy 

Moskva 

Murgab 

Mys  Shipunskiy 

Nakhichevan' 

Namangan 

Naryn 

Nelyaty 

Nizhneangarsk 

Novosibirsk 

Nurata 

Obi-Garm 

Obninsk 

Okha 

Omsukchan 

Oni 

Chlik 


IRK 

52‘'16'N, 

104®19’E 

ILT 

67®50'N,  178*48^ 

KAB 

52®03'N, 

106'’39'E 

KLD 

~38.6®N. 

~69.5®E 

KRU 

38‘’29'N. 

68®59'E 

KHS 

42®57'N. 

42®12E 

KHG 

62®40'N. 

135®36'E 

KPC 

49“42'N, 

112®24'E 

KHE 

80®37’N, 

58“03E 

KHO 

37®29'N. 

71®32'E 

KRV 

40®39'N. 

46®20'E 

KIS 

47®01’N, 

28®52'E 

KAT 

39‘»12'N, 

56‘‘16’E 

KLY 

56®19’N. 

160‘’52’E 

KSV 

48*19’N, 

25®04'E 

KOZ 

56«04'N, 

159®52'E 

KRS 

40WN, 

53'’00'E 

KRN 

42®36’N, 

161®10'E 

KBG 

56n5’N. 

162‘’42'E 

KUL 

37®54'N, 

69®45'E 

KMO 

55®53'N, 

111®13'E 

KUR 

45‘»14‘N. 

ursTE 

KRM 

43WN. 

78®27'E 

KYA 

50*22'N, 

106^27'E 

LGD 

41®49'N, 

46®16E 

LEN 

40‘’41'N, 

43*51'E 

LNK 

38®46'N, 

48®50'E 

LW 

49®49'N, 

24*02'E 

LNA 

~38.2®N, 

~69.2®E 

MAG 

59«33‘N, 

150®48’E 

MAK 

43‘’0rN, 

47‘’26'E 

MLK 

43"52'N, 

146®49'E 

MAU 

48®05’N, 

153*13’E 

MEZ 

48®3rN, 

23®31'E 

MGC 

40‘’45’N, 

47®03'E 

MOY 

5r41'N, 

100®59’E 

MOS 

55®44‘N, 

37®38'E 

MUR 

38®22’N, 

73®56’E 

SPN 

~53.1*N, 

~160.0®E 

NAK 

39*12'N, 

45®24’E 

NAM 

40®59'N, 

7r40E 

NRN 

41®26'N, 

76®00'E 

NLY 

56®29'N, 

115®41'E 

NIZ 

55®47'N, 

109'’33'E 

NVS 

55«02’N, 

82®55'E 

NUT 

40®33'N, 

65*41 E 

OBG 

38®43'N, 

69*43E 

OBN 

55®10'N, 

36°27E 

OKH 

53‘’33'N, 

142*56E 

OMS 

62®32'N, 

155*48E 

ONI 

42‘’35’N, 

43*26E 

ORL 

52'’30'N, 

99*55E 
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Baykal 

Arctic 

Baykal 

Central  Asia 

Antral  Asia 

Caucasus 

Yakutiya 

Baykal 

Arctic 

Central  Asia 

Caucasus 

Carpathia 

Ko^t  Dag 

Far  East 

Carpathia 

Far  East 

Kopet  Dag 

Far  East 

Far  East 

Central  Asia 

Baykal 

Far  East 

Central  Asia 

Baykal 

Caucasus 

Caucasus 

Caucasus 

Carpathia 

Central  Asia 

Northeast 

Caucasus 

Far  East 

Far  East 

Carpathia 

Caucasus 

Baykal 

Teleseismic 

Central  Asia 

Far  East 

Caucasus 

Central  Asia 

Central  Asia 

Baykal 

Baykal 

Altay-Saysm 

Central  Asia 

Central  Asia 

Teleseismic 

Sakhalin 

Northeast 

Caucasus 

Baykal 


Table  1  (Continued) 


Pauzhetka 

PAU 

-Sl-S^N, 

Petrc^avlovsk 

PET 

53°00'N. 

Przheval'sk 

PRZ 

42°29’N, 

Pulkovo 

PUL 

59‘’46'N. 

Pyatigorsk 

PYA 

44“02'N, 

Rakhov 

RAK 

47®57‘N, 

Regar 

RGR 

38°30'N, 

Reydovo 

REI 

45°16'N, 

Rybach’ye 

RYB 

42«08'N, 

Sabedo 

SAB 

42‘*39’N, 

Samarkand 

SAM 

39‘’40’N. 

Senoipalatinsk 

SEM 

50‘’24'N, 

Semlyachik 

SEL 

54WN, 

Severo-Kuril'sk 

SKR 

50‘’40'N, 

Seymchan 

SEY 

62«53*N. 

Shaaituz 

SHTZ 

37®16’N, 

Shemakha 

SHE 

40®38'N. 

Simferopol' 

SIM 

44“57'N, 

Simushir 

SIU 

46®51'N. 

Sochi 

SOC 

43«35'N, 

Sredniy  Kalar 

SRK 

55®52*N. 

Stepanavan 

STE 

41WN, 

Susuman 

SUUS 

62®47'N, 

Sverdlovsk 

SVE 

56‘’48'N. 

Talgar 

TLG 

43n4'N, 

Tai^ybulak 

TMD 

41.6®N, 

Tashtent 

TAS 

4r20'N, 

Tiksi 

TIK 

71«38'N. 

Topolovo 

TOP 

-53,3®N. 

Tsebel'da 

TSE 

43®01'N, 

Tupik 

TUP 

54®26’N, 

Tymovskoye 

TYV 

50«51'N, 

Tyrgan 

TRG 

52°45’N, 

Uakit 

UKT 

55®30'N, 

Uglegorsk 

UGL 

49‘’05’N. 

Ust'-Hegest 

Ust'-Kan 

UER 

51«34’N, 

UKR 

50®57'N. 

Ust'-Nera 

UNR 

64‘‘34'N, 

Ust'-Nyukzha 

USZ 

56*34'N. 

Ust'-Omchug 

uso 

61‘’09’N, 

Uzhgorod 

UZH 

48‘»38'N, 

Vannovskaya 

VAN 

37®57'N, 

Vaidenis 

VRD 

4onrN, 

Vladivostok 

VIA 

43*07’^ 

Yakutsk 

YAK 

62‘’01'N, 

Yalta 

YAL 

44®30'N, 

Yuzhno-Kuril'sk 

Yuzhno- 

YUK 

44®02'N, 

Sakhalinsk 

YSS 

47®01'N. 

Zakamensk 

ZAK 

50«23'N, 

Zhiloy  ostrov 

ZHI 

40°19’N. 

Zugdidi 

ZUG 

42°31’N. 

~156.8*E 

Far  East 

158*38^ 

Far  East 

78®24'E 

Central  Asia 

30n9’E 

Teleseismic 

43‘>04E 

(Caucasus 

24'»10E 

Caipathia 

68®14'E 

Central  Asia 

148®02'E 

Far  East 

77*10'E 

(jentral  Asia 

41*54'E 

Caucasus 

66'»59E 

Central  Asia 

80“15’E 

Teleseismic 

ItiOni-E 

Far  East 

156‘X)6'E 

Far  East 

152“26'E 

Northeast 

68‘X)8E 

Central  Asia 

48*38^ 

Caucasus 

34‘W'E 

Oimea 

15P42E 

Far  East 

39“43'E 

Caucasus 

117“22'E 

Baykal 

44“23E 

Caucasus 

148nO'E 

Northeast 

60*38'E 

Teleseismic 

77'»14’E 

Central  Asia 

64.6‘^ 

Central  Asia 

e9‘’18'E 

(jentral  Asia 

128®52'E 

Arctic 

-158.4TE 

Far  East 

41«17’E 

Claucasus 

119'»54'E 

Baykal 

142«39'E 

Far  East 

106"20’E 

Baykal 

113«37’E 

Baykal 

142'WE 

Far  East 

94®05’E 

Altay-Sayan 

84®45'E 

Altay-Sayan 

143n2’E 

Yakutiya 

121®37'E 

Yakutiya 

149‘»38’E 

Northeast 

22*18E 

Claipathia 

58*^^ 

Ko]^t  Dag 

45'’43’E 

Caucasus 

13r54E 

Teleseismic 

129®43’E 

Yakutiya 

34®10’E 

CMmea 

145*51^ 

Far  East 

142^43^ 

Far  East 

103®17’E 

Baykal 

50*36E 

Caucasus 

4r53'E 

Caucasus 

li 


Table  2 


(Summarized  fix)m  Anderson  et  al.,  1990) 
Relation:  arrival  (summary  information  on  a  seismic  arrival). 


Attribute  External  Format _ Character  Positions _ Pescnption 


sta 

a6 

1-6 

station  code 

tinae 

fl7.5 

8-24 

epoch  time 

arid 

i8 

26-33 

arrival  id 

jdate 

i8 

35-42 

Julian  date 

stassid 

i8 

44-51 

stassoc  id 

chanid 

i8 

53-60 

instrument  id 

chan 

a8 

62-69 

channel  code 

iphase 

a8 

71-78 

reported  phase 

stypc 

al 

80-80 

signal  ty^ 

ddtim 

f6.3 

82-87 

delta  time 

aTimiith 

n.2 

89-95 

observed  azimuth 

HfJay 

f7.2 

97-103 

delta  azimutii 

slow 

r.2 

105-111 

observed  slowness 

delslo 

t7.2 

113-119 

delta  slowness 

ema 

n.2 

121-127 

emergence  angle 

rect 

n.3 

129-135 

rectilinearity 

anro 

fio.l 

137-146 

amplitude 

per 

n.2 

148-154 

period 

logat 

n.2 

156-162 

log(aiiq)/per) 

clip 

al 

164-164 

clii^}edflag 

fin 

a2 

166-167 

first  motion 

snr 

flO.2 

169-178 

signal  to  noise  ratio 

qual 

al 

180-180 

signal  onset  quality 

auth 

al5 

182-196 

source/originator 

commid 

i8 

198-205 

comment  id 

IddatB 

al7 

207-223 

load  date 
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Table  3 


(Summarized  fitMn  Anderson  et  al.,  1990) 
Relation:  assoc  (data  associating  arrivals  with  origins). 


AMiiuis _ External  Format _ Character  Positions — Pcscription. 


arid 

i8 

1-8 

arrival  id 

orid 

i8 

10-17 

origin  id 

sta 

a6 

19-24 

station  code 

phase 

a8 

26-33 

associated  phase 

belief 

f4.1* 

35-38 

phase  amfidence 

delta 

f8.3 

40-47 

station  to  event  distance 

seaz 

n.2 

49-55 

stati(»  to  event  azimuth 

esaz 

0.2 

57-63 

event  to  station  azimuth 

timnes 

f8.3 

65-72 

time  residual 

timedef 

al 

74-74 

time  =  defining,  non-defining 

azres 

f7.1 

76-82 

azimuth  residu^ 

azdef 

al 

84-84 

azimuth  =  defining,  non-defining 

slores 

f7.0** 

86-92 

slowness  residual 

slodef 

al 

94-94 

slowness  =  defining,  non-defining 

emares 

0.1 

96-102 

incidence  angle  residual 

wgt 

f6.3 

104-109 

location  wei^t 

vitxxiel 

al5 

111-125 

velocity  model 

commid 

i8 

127-134 

comment  id 

Iddate 

al7 

load  date 

load  date 

*  The  format  for  this  attribute  was  given  as  f4.2  in  Anderson  et  al.  (1990),  but  f4.1  is  used  here 
because  it  appears  to  be  the  format  that  was  intended  to  be  tised  for  this  attribute. 

**  The  format  for  this  attribute  was  given  as  HJl  in  Anderson  et  al.  (1990),  but  f7.0  is  used  here 
because  it  appears  to  be  the  format  tlut  was  intended  to  be  used  for  this  attribute. 
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Table  4 

(Summarized  from  Anderson  et  al.,  1990) 
Relation:  evoit  (event  identification). 


evid 

iS 

1-8 

event  id 

evname 

al5 

10-24 

event  name 

prefor 

i4 

26-33 

preferred  origin 

autfa 

al5 

35-49 

source/originator 

commid 

i8 

51-58 

ccxnmenttd 

Iddaie 

al7 

136-152 

load  date 

Table  5 

(Summarized  frx}m  Anderson  et  al.,  1990) 
Relation:  origin  (data  on  event  location  and  confidence  bounds). 


Attribute  External  Format _ Character  Positions _ Dcscriptifill 


lat 

f9.4 

1-9 

estinoared  latitude 

Ion 

f9.4 

11-19 

estimated  longitude 

depth 

f9.4 

21-29 

estimated  dq)th 

time 

fl7.5 

31-47 

qxxrhtime 

Olid 

i8 

49-56 

origin  id 

evid 

i8 

58-65 

event  id 

jdate 

i8 

67-74 

jtiliandate 

nass 

i4 

76-79 

number  of  associated  phases 

ndef 

i4 

81-84 

number  of  locating  phases 

ndp 

i4 

86-89 

number  of  depth  phases 

gm 

i8 

91-98 

geographic  regitm  number 

sm 

i8 

100-107 

seismic  region  number 

etype 

a7 

109-115 

event  type 

dej^p 

f9.4 

117-125 

estima^  depth  from  depth  phases 

dtype 

al 

127-127 

depth  method  used 

mb 

f7.2 

129-135 

body  wave  magnitude 

mind 

i8 

137-144 

mbmagid 

ms 

n.2 

146-152 

surface  wave  magnitude 

msid 

i8 

154-161 

ms  magid 

ml 

f7.2 

163-169 

local  magnitude 

mlid 

i8 

171-178 

ml  magid 

algorithm 

al5 

180-194 

locatitm  algorithm  used 

auth 

al5 

196-210 

source/originatOT 

commid 

i8 

212-219 

comment  id 

al7 

221-237 

load  date 
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Table  6 


STA 

EVNAME 

DELIA 

MB  Q  IPHASE 

OBN 

198601  1  6  9  63 

16.42 

4.8  e  P 

OEN 

198601  12210261 

61.55 

5.1  e  P 

OBN 

198601  3  943273 

90.97 

5.4  e  P 

OBN 

198601  3  943273 

90.97 

5.4  i  S 

OBN 

198601  31558  94 

62.94 

5  e  P 

0^ 

198601  31558  94 

62.94 

5  e  S 

OBN 

198601  4  952537 

127.31 

5  PKP 

OBN 

198601  41336337 

127.31 

5.3  PKP 

OBN 

198601  5  2  7362 

127.34 

4.7  e  PKP 

OBN 

198601  5  921310 

65.47 

5  P 

OBN 

198601  5  921310 

65.47 

5  e  pP 

OBN 

198601  6  0  9  95 

16.74 

4.8  e  P 

OBN 

198601  6  0  9  95 

16.74 

4.8  1  S 

OBN 

198601  61737201 

35.77 

4.9  P 

OBN 

198601  71312  84 

89.2 

5  e  P 

OBN 

198601  71355  16 

71.25 

4.9  e  P 

OBN 

198601  71355  16 

71.25 

4.9  e  pP 

OBN 

198601  8  027207 

18.68 

4.2  e  P 

OBN 

198601  8  027207 

18.68 

4.2  e  S 

OBN 

19860110  346309 

44.35 

5.5  P 

OBN 

19860110  346309 

44.35 

5.5  e  pP 

oral 

19860110  346309 

44.35 

5.5  e  S 

OBN 

19860110  6  2585 

75.19 

4.9  e  P 

OBN 

1986011115  1  75 

18.63 

4.3  e  P 

OBN 

198601122014557 

31 

5.4  P 

OBN 

198601122014557 

31 

5.4  e  S 

OBN 

198601131157193 

69.52 

5.2  e  P 

OBN 

198601131348  36 

17.88 

4.8  P 

OBN 

19860114  3  3373 

30.05 

5.2  P 

OBN 

19860114  3  3373 

30.05 

5.2  e  S 

OBN 

19860116  5  8347 

84.86 

5.5  P 

OBN 

19860116  5  8347 

84.86 

5.5  e  pP 

OBN 

19860116  5  8347 

84.86 

5.5  e  S 

OBN 

19860116  834447 

72.52 

5.1  P 

OBN 

198601161111599 

74.94 

5.1  e  P 

OBN 

1986011613  4312 

67.5 

5.4  P 

OBN 

1986011613  4312 

67.5 

5.4  e  sP 

OBN 

1986011613  4312 

67.5 

5.4  e  S 

OBN 

19860117  753454 

85.15 

4.8  P 

OBN 

19860118  744487 

55.29 

5.2  P 

OBN 

19860^.18  744487 

55.29 

5.2  e  sP 

OBN 

19860110  756240 

125.39 

5.1  PKP 

OBN 

19860119  635510 

76.99 

5.2  P 

OBN 

198601191445465 

34.11 

5  e  P 

OBN 

19860122  2  1156 

32.74 

4.4  P 

OBN 

19860122  758399 

29.24 

4.2  e  P 

OBN 

198601221226458 

117.56 

5.9  e  PKP 

OBN 

198601221457132 

89.07 

5.6  P 

OBN 

198601221457132 

89.07 

5.6  e  pP 

OBN 

19860123  816  46 

63.19 

4.9  e  P 

OBN 

1986012516  0415 

28.86 

5.1  e  P 

OBN 

19860127  243575 

69.55 

4.9  e  P 

OBN 

19860127  719343 

21.91 

4.6  e  P 

OBN 

198601271635514 

18.16 

5.3  P 

15 


Table  6  (Continued) 


CffiN 

198601271635514 

18.16 

5.3  e  S 

OBN 

198601281232168 

64.62 

5.7  P 

OBN 

198601281232168 

64.62 

5.7  e  S 

OBN 

19860129  927419 

89.55 

5.3  P 

OBN 

198601311748  42 

64.63 

5.1  P 

OBN 

198601311748  42 

64.63 

5.1  e  sP 

60  records  selected. 


16 


Table  7 


STA  EVNAME 


YAK  198601161545  67 
YAK  198601161545  67 
YAK  198601161853  50 
YAK  19860117  753454 
YAK  19860118  158589 
YAK  19860118  158589 
YAK  19860118  158589 
YAK  19860118  744487 
YAK  19860118  756240 
YAK  19860119  635510 
YAK  19860119  635510 
YAK  198601191445465 
YAK  198601192225571 
YAK  198601201928226 
YAK  1986012022  1161 
YAK  19860122  2  1156 
YAK  198601221226458 
YAK  198601221226458 
YAK  19860114  3  3373 
YAK  19860114  3  3373 
YAK  19860114  3  3373 
YAK  198601141157492 
YAK  198601141856299 
YAK  1986011419  5  54 
YAK  198601151730273 
YAK  198601152017312 
YAK  198601152017312 
YAK  19860116  5  8347 
YAK  19860116  5  8347 
YAK  19860116  834447 
YAK  19860116  834447 
YAK  198601161111599 
YAK  1986011613  4312 
YAK  1986011613  4312 
YAK  1986011613  4312 
YAK  198601161545  67 
YAK  198601  92141551 
YAK  198601  92141551 
YAK  198601  92141551 
YAK  19860110  346309 
YAK  19860110  346309 
YAK  19860110  6  2585 
YAK  198601111231146 
YAK  198601111350137 
YAK  198601111350137 
YAK  198601122014557 
YAK  198601122014557 
YAK  198601122343182 
YAK  198601122343182 
YAK  19860113  842250 
YAK  198601131157193 
YAK  198601131742414 
YAK  198601132322399 


DELTA 

MB 

Q 

IPHASE 

48.68 

5.3 

i 

pP 

48.68 

5.3 

i 

S 

34.72 

4.8 

P 

58.76 

4.8 

P 

31.97 

5.8 

P 

31.97 

5.8 

i 

S 

31.97 

5.8 

i 

sS 

47.15 

5.2 

P 

82.76 

5.1 

P 

36.18 

5.2 

P 

36.18 

5.2 

i 

s 

49.08 

5 

p 

31.57 

4.8 

e 

p 

37.45 

4.5 

p 

37.49 

4.7 

p 

51.41 

4.4 

e 

p 

75.97 

5.9 

p 

75.97 

5.9 

i 

sP 

44.07 

5.2 

i 

pP 

44.07 

5.2 

1 

SP 

44.07 

5.2 

i 

S 

37.47 

5.1 

P 

37.47 

5.1 

P 

37.45 

5.1 

P 

37.47 

4.8 

P 

89.17 

6 

P 

89.17 

6 

e 

S 

56 

5.5 

P 

56 

5.5 

i 

SP 

32.75 

5.1 

e 

p 

32.75 

5.1 

i 

s 

34.67 

5.1 

p 

37.6 

5.4 

p 

37.6 

5.4 

e 

s 

37.6 

5.4 

i 

ScP 

48.68 

5.3 

P 

21.41 

4.5 

P 

21.41 

4.5 

1 

SP 

21.41 

4.5 

i 

S 

43.69 

5.5 

P 

43.69 

5.5 

i 

S 

34.95 

4.9 

P 

80.93 

5.2 

P 

69 

5.1 

P 

69 

5.1 

i 

S 

46.52 

5.4 

P 

46.52 

5.4 

i 

s 

19.61 

5 

p 

19.61 

5 

i 

s 

37.48 

4.8 

p 

38.72 

5.2 

e 

p 

69.28 

5 

p 

63.48 

5 

p 

17 


Table  7  (Continued) 


YAK 

19860114  3  3373 

44.07 

5.2  P 

YAK 

198601  12210261 

18.91 

5.1  P 

YAK 

198601  3  224398 

145.61 

5.2  PKP 

YAK 

198601  3  943273 

62.87 

5.4  P 

YAK 

198601  3  943273 

62.87 

5.4  i  S 

YAK 

198601  31558  94 

57.47 

5  P 

YAK 

198601  31558  94 

57.47 

5  i  pP 

YAK 

198601  31558  94 

57.47 

5  i  S 

YAK 

198601  4  952537 

84.86 

5  P 

YAK 

198601  41336337 

84.84 

5.3  P 

YAK 

198601  5  2  7362 

84.95 

4.7  P 

YAK 

198601  5  553521 

67.44 

5.8  P 

YAK 

198601  5  921310 

21.41 

5  P 

YAK 

198601  5  921310 

21.41 

5  i  S 

YAK 

198601  7  8  8466 

84.66 

5  P 

YAK 

198601  71038546 

92.56 

5.2  P 

YAK 

198601  71038546 

92.56 

5.2  i  pP 

YAK 

198601  71355  16 

65.57 

4.9  P 

YAK 

198601  9  624425 

17.59 

4.9  e  P 

YAK 

198601221226458 

75.97 

5.9  i  S 

YAK 

198601221457132 

62.43 

5.6  P 

YAK 

198601221457132 

62.43 

5.6  i  S 

YAK 

198601221732540 

50.4 

5.1  P 

YAK 

19860123  816  46 

19.03 

4.9  P 

YAK 

19860123  816  46 

19.03 

4.9  i  S 

YAK 

198601231353562 

19.25 

4.8  P 

YAK 

198601231353562 

19.25 

4.8  e  S 

YAK 

1986012516  0415 

35.65 

5.1  P 

YAK 

1986012516  0415 

35.65 

5.1  i  SS 

YAK 

19860126  748218 

142.41 

5.7  PKP 

YAK 

198601261628554 

34.51 

4.7  e  P 

YAK 

198601261628554 

34.51 

4.7  e  pP 

YAK 

198601261729528 

91.99 

5  e  P 

YAK 

198601261920511 

66.26 

5.2  P 

YAK 

19860127  243575 

38.73 

4.9  P 

YAK 

19860127  349431 

27.42 

4.8  P 

YAK 

19860127  349431 

27.42 

4.8  1  S 

YAK 

19860127  349431 

27.42 

4.8  1  sS 

YAK 

19860127  735238 

76.22 

5.5  P 

YAK 

19860127  735238 

76.22 

5.5  i  S 

YAK 

198601271635514 

52.47 

5.3  e  P 

YAK 

198601271635514 

52.47 

5.3  i  S 

YAK 

198601272032  26 

38.21 

4.7  P 

YAK 

19860128  928232 

39.29 

4.7  e  P 

YAK 

198601281232168 

59.14 

5.7  P 

YAK 

198601281232168 

59.14 

5.7  i  S 

YAK 

1986012818  5236 

34.26 

4.8  e  P 

YAK 

1986012818  5236 

34.26 

4.8  e  sS 

YAK 

1986012820  1287 

79.59 

4.9  P 

YAK 

19860129  927419 

49.46 

5.3  P 

YAK 

19860129  927419 

49.46 

5.3  i  S 

YAK 

19860130  715330 

58.01 

5.1  P 

YAK 

19860131  227  32 

20.8 

4.9  e  P 

YAK 

198601311437234 

153.7 

5.1  PKP 

YAK 

198601311748  42 

21.33 

5.1  P 

18 


Table  7  (Ccmtinued) 


YAK  198601311748  42  21.33  5.1  e  sP 

YAK  198601311748  42  21.33  5.1  i  S 

110  records  selected. 


Table  8 


STA 

EVNAME 

DELTA 

MB 

Q  IPHASE 

BLA 

198601  8  342511 

73.03 

5.2 

e 

P 

BLA 

19860112  638220 

41 

5.5 

P 

BLA 

19860114  3  9357 

32.55 

5.2 

e 

P 

BLA 

198601141034  21 

121.42 

5.6 

PKP 

BLA 

19860126  748218 

64.52 

5.7 

P 

BLA 

198601261920511 

32.49 

5.2 

e 

P 

BLA 

198601291334100 

30.4 

5.5 

P 

BLA 

198601302226347 

30.34 

4.9 

P 

BLA 

198601302323289 

30.32 

4.8 

P 

BLA 

198601311646410 

4.41 

4.8 

e 

Pn 

10  records  selected. 
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Table  9 


STA 

EVN2VME 

DELIA 

MB  Q  IPHASE 

GOL 

19860130  6  6408 

25.4 

4.5  e  P 

GQL 

19860130  715330 

16.94 

5.1  e  P 

GGfL 

198601301641  10 

91.91 

4.7  e  P 

GQL 

198601302226347 

41.61 

4.9  e  P 

GQL 

198601302323289 

41.6 

4.8  e  P 

GQL 

19860131  551406 

69.24 

4.9  e  P 

GQL 

19860131  551406 

69.24 

4.9  e  pP 

GQL 

198601311646410 

18.48 

4.8  e  P 

GQL 

198601311748  42 

77.61 

5.1  e  P 

GQL 

198601261920511 

12.87 

5.2  e  P 

GQL 

19860127  052374 

27.19 

4.4  e  P 

GQL 

19860127  159421 

85.17 

4.7  e  P 

GQL 

19860127  349431 

53.99 

4.8  e  P 

GQL 

19860127  735238 

99.22 

5.5  e  P 

GQL 

198601271021599 

91.97 

5.2  e  P 

GQL 

198601271936177 

21.67 

4.6  e  P 

GQL 

19860128  651466 

48.61 

5.2  e  P 

GQL 

198601281232168 

128.49 

5.7  e  PKP 

GQL 

198601281543573 

21.77 

4.7  i  P 

GQL 

198601282319  51 

85.82 

5  e  P 

GQL 

198601282319  51 

85.82 

5  e 

GQL 

19860129  927419 

94.74 

5.3  P 

GQL 

198601291019  52 

40.79 

4.7  e  P 

GQL 

198601291334100 

41.6 

5.5  e  P 

GQL 

198601291349429 

41.58 

4.7  P 

GC^ 

198601291447175 

41.52 

4.7  e  P 

GQL 

1986012920  1279 

22.36 

4.6  P 

GQL 

19860117  415  00 

56.02 

5.5  e  P 

GQL 

19860118  158589 

47.2 

5.8  e  P 

GQL 

19860119  635510 

88.21 

5.2  e  P 

GQL 

19860119  8  3287 

45.3 

4.9  e  P 

GQL 

198601191128  14 

26.82 

4.2  e  P 

GQL 

19860121  524231 

88.53 

5.6  e  P 

GQL 

198601211739490 

84.31 

4.6  e  P 

GQL 

198601211739490 

84.31 

4. 6  e 

GQL 

1986012212  9562 

25.24 

4.1  e  P 

GQL 

198601221226458 

99.18 

5.9  e  P 

GQL 

198601221457132 

120.24 

5.6  i  PKP 

GQL 

19860125  449417 

88.58 

5  e  P 

GQL 

19860125  939465 

50.62 

5.2  e  P 

GQL 

198601252023183 

148.37 

4.8  e  PKP 

GQL 

198601252023183 

148.37 

4.8  e  SPKP2 

GQL 

19860126  748218 

73.76 

5.7  i  P 

GQL 

19860126  748218 

73.76 

5.7  e  sP 

GQL 

198601  1  437249 

25.13 

4.6  e  P 

GQL 

198601  122  1182 

20.43 

5.2  e  P 

GQL 

198601  21435598 

21.14 

4.8  e  P 

GQL 

198601  22042403 

144.41 

4.8  e  PKP 

GQL 

198601  22133425 

149.78 

4.8  e  PKP 

GQL 

198601  3  943273 

118.86 

5.4  e  PKP 

GQL 

198601  42331  77 

20.42 

5.1  P 

GQL 

198601  71038546 

91.22 

5.2  e  P 

GQL 

198601  71225139 

25.09 

4.3  e  P 

GQL 

198603  8  342511 

81.37 

5.2  e  P 

Table  9  (Continued) 


GOL 

19860112  638220 

49.62 

5. 5  e  P 

GOL 

198601121651325 

21.34 

4.7  e  P 

GOL 

198601131232  46 

5.2 

0  e  Pn 

GOL 

19860116  834447 

88.76 

5.1  e  P 

GOL 

1986011614  0  77 

43.66 

4.8  P 

GOL 

1986011623  7355 

88.99 

5  P 

61  records  selected. 
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Table  10 

Phases  Reported  by  Selected  Stations  in  January  1986 


Ehass _ OBN  YAK  NVS  BLA _ _ ALQ 


p 

36 

63 

29 

8 

49 

129 

PKP 

5 

3 

2 

1 

6 

22 

P/PKP  ratio 

0.14 

0.05 

0.07 

0.13 

0.12 

0.17 

PcP 

0 

0 

0 

0 

0 

2 

PcS 

0 

0 

1 

0 

0 

0 

Pdiff 

0 

0 

1 

0 

0 

0 

Pn 

0 

0 

0 

1 

1 

3 

pP 

5 

5 

0 

0 

1 

8 

pPKP 

0 

0 

0 

0 

0 

0 

S 

11 

25 

16 

0 

0 

0 

ScP 

0 

1 

0 

0 

0 

0 

ScS 

0 

0 

0 

0 

0 

0 

SKS 

0 

0 

0 

0 

0 

0 

SP 

0 

1 

1 

0 

0 

0 

sP 

3 

4 

0 

0 

1 

0 

sPKP2 

0 

0 

0 

0 

1 

0 

sS 

0 

3 

0 

0 

0 

0 

Unidentified 

0  0  0  0  2 

Table  11 

Phases  Reported  by  Selected  Stations  in  January  1984 

0 

Ehasss _ OBN  YAK  NVS _ ELA _ QQL _ ALQ. 


P 

63 

93 

62 

12 

35 

126 

PKP 

7 

7 

4 

2 

4 

50 

P/PKP  ratio 

0.11 

0,08 

0.06 

0.17 

0.11 

0.40 

PcP 

0 

0 

0 

0 

0 

1 

Pdifif 

0 

0 

0 

0 

1 

1 

PcS 

0 

0 

0 

0 

0 

0 

Pn 

0 

0 

0 

0 

0 

0 

pP 

7 

9 

0 

0 

4 

14 

pPKP 

0 

0 

0 

0 

1 

S 

12 

38 

35 

0 

0 

1 

ScP 

0 

0 

0 

0 

0 

1 

ScS 

0 

1 

0 

0 

0 

0 

SKS 

1 

0 

0 

0 

0 

0 

SP 

0 

0 

0 

0 

0 

0 

sP 

4 

2 

1 

1 

1 

3 

SPKP2 

0 

0 

0 

0 

0 

0 

sS 

1 

2 

0 

0 

0 

0 

Unidentified 

0 

0 

0 

0 

3 

1 

22 


Table  12 


STA 

IPHASE 

EVNAME 

DELTA 

MB 

LAT 

LCN 

GOL 

P 

198401281923284 

22.76 

5 

17.3205 

-100.12 

Q3L 

P 

1984013018  1  44 

35.8 

4.8 

55.7564 

-154.3546 

GOL 

P 

198401282252446 

35.88 

4.9 

9.2516 

-83.8755 

GOL 

P 

19840123  559460 

38.85 

4.9 

20.2941 

-65.9484 

GOL 

P 

198401111135537 

42.55 

5 

-3.0036 

-103.0225 

GOL 

P 

1984012817  4392 

43.01 

5 

6.6627 

-74.5211 

GOL 

P 

198401  61137498 

43.79 

5 

6.7488 

-73.0643 

GOL 

P 

19840117  417173 

44.01 

4.5 

5.8248 

-73.9573 

GOL 

P 

1984012322  6  64 

44.79 

5.4 

53.2611 

-169.6661 

GOL 

P 

198401171619  46 

48.68 

5.9 

-3.9152 

-81.4104 

GOL 

P 

19840113  229  20 

49.93 

5.8 

-3.8823 

-78.4707 

GOL 

P 

198401  52141486 

50.96 

5.2 

51.3622 

-179.2571 

GOL 

P 

198401291614363 

56.85 

5.2 

71.8835 

-1.5914 

GOL 

P 

198401301613510 

57.36 

4.4 

75.4703 

7.6667 

GOL 

P 

19840117  332  80 

57.73 

5.1 

-8.883 

-71.3051 

GOL 

P 

198401261930590 

58.09 

5.1 

-12.2722 

-76.9016 

GOL 

P 

198401141334  64 

58.62 

4.8 

-11.5795 

-74.3015 

GOL 

P 

19840125  717589 

65.63 

4.9 

8.7444 

-39.8998 

GOL 

P 

19840125  659  04 

66 

4.9 

8.6203 

-39.5093 

GOL 

P 

19840125  351451 

66.05 

5.1 

8.6614 

-39.4137 

GOL 

P 

198401161227240 

69.67 

5.7 

-30.0345 

-112.2646 

GOL 

P 

198401  42240417 

70.96 

6 

45.3996 

151.3144 

GOL 

P 

198401  615  1344 

71.79 

5.3 

-23.7739 

-68.7914 

GOL 

P 

198401  122  8121 

72.1 

5.4 

-22.6582 

-66.0139 

GOL 

P 

19840125  935  58 

77.53 

5.3 

42.2668 

143.0713 

GOL 

P 

198401171113418 

82.58 

5.6 

36.5099 

141.1398 

GOL 

P 

198401241847570 

84.07 

4.9 

-16.3865 

-173.0189 

GOL 

P 

198401  418  0  53 

84.42 

5 

-15.6647 

-174.24 

GOL 

P 

198401  1  9  3401 

87.13 

6.4 

33.6199 

136.803 

GOL 

P 

19840120  133248 

88.03 

5.2 

50.6363 

96.3999 

GOL 

P 

198401221351513 

88.32 

5.3 

-21.3032 

-174.2573 

GOL 

P 

19840120  353  34 

88.94 

5.3 

-17.8164 

-178.6029 

GOL 

P 

198401171949582 

92.61 

5.4 

-22.2384 

-179.6396 

GOL 

P 

198401191615155 

92.66 

5.8 

-23.6792 

-178.2983 

GOL 

P 

19840123  734569 

93.97 

5.8 

29.2822 

130.438 

35  records  selected. 
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Figure  Captions 


Figure  1:  Locations  of  seismic  stations  in  the  former  Soviet  Union,  (a)  Stations  that  report  (or 
have  previously  reported)  seismic  phase  data  to  the  ISC.  (b)  Stations  used  for  demonstration  of 
SQL  queries  using  a  database  created  by  programs  written  for  this  project. 

Hgure  2:  (a)  Epicenters  of  all  events  reported  in  the  ISC  Bulletin  for  the  month  of  January  1986 
( 1 .3  <  mb  <  6.2).  (b)  Epicenters  of  all  events  reported  in  the  ISC  Bulletin  for  the  month  of 
January  1984(i.6<mb<  6.4). 

Figure  3:  Epicenters  of  all  events  for  which  at  least  one  phase  was  reported  by  station  OBN  during 
January  1986  (4.2  <  mb  <  5.9). 

Figure  4:  Epicenters  of  all  events  for  which  at  least  one  phase  was  reported  by  station  YAK  during 
January  1986  (4.4  <  mb  <  6.0). 

Figure  5:  Epicenters  of  all  events  for  which  at  least  one  phase  was  reported  by  station  BLA  during 
January  1986  (4.8  <  mb  <  5.7). 

figure  6:  Epicenters  of  all  events  for  which  at  least  one  phase  was  reported  by  station  (jOL  during 
January  1986(4.1  <mb<  5.9). 

figure  7:  Epicenters  of  all  events  for  which  at  least  one  phase  was  reported  by  station  OBN  during 
January  1984  (0.0  <  mb  <  6.4). 

Figure  8;  (a)  Epicenters  of  events  for  which  there  were  P  phases  reported  by  OBN,  but  not  NVS, 
during  January  1984.  (b)  Epicenters  of  events  for  which  there  were  P  phases  reported  by  NVS, 
but  not  OBN  during  January  1984. 
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Figure  5 
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APPENDK  A 

Program  for  Creating  die  Relation  arrival. 
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ilncliide  <stdlo.h> 

# Include  <8trlng.h> 
flnclude  <stdllb.h> 
flnclude  <nath.h> 
flnclude  <float.h> 

flnclude  "fjnot.c" 
flnclude  ■nild_stx.c" 
flnclude  "day.c" 
flnclude  "Tline_Subs.c" 

fdeflne  CHANID  -1 
fdeflne  CHAN  " 
fdeflne  C0M4ID  -1 
fdeflne  DELTIM  -1.0 
fdeflne  AZIMDTH  -1.0 
fdeflne  DELAZ  -1.0 
fdeflne  SLOW  -1.0 
fdeflne  DELSLO  -1.0 
fdeflne  EMA  -1.0 
fdeflne  BECT  -1.0 
fdeflne  LOGAT  -999.0 
fdeflne  STYPE 
fdeflne  CLIP 
fdeflne  SNR  -l.O 

double  tlmecon(char  *tlinstr); 
double  dtoepochdong  date); 

chaur  *mld_str (char  str[],  Int  first,  Int  length); 
fn)ot(char  finr],  char  fixitn); 

madnO 

{ 

FILE  *lnflle,  *o\itflle,  *lnfo; 

char  ln_llne[100] ,  out_llne[225] ,  outl[200],  out2[200],  out3[200]; 
char  tii^2  [2] ; 

Int  1,  j,  n,  slength; 
char  nxtrc,  thsrc; 

Int  get_out; 

Int  arid,  stassld; 

Int  mo,  da,  hr,  mn; 

char  s_yr[5],  s_mo[3],  s_da[3],  s_hr[3],  s_mnt3]; 

long  Int  jdate,  yr; 

char  stype,  qual,  fmtn,  aut; 

char  sta[6],  lphaise[9],  £m[3],  auth[l€],  lddate[20]; 

char  flle_l[211,  flle_2[21]; 

float  per,  sec; 

double  ampl,  anqp2,  anp,  time; 

char  s_per[8],  s_sec[5],  s_ainpl[5],  s_aii5>2[3],  s_tlme[13]; 

Info  =  fopen("run_lnfo",  "r") ; 
fgets (Iddate, 20, Info) ; 
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lddate[strlen(lddate)-l]  »  '\0'; 
fgets 20, info) ; 

file_ltstrlen(file_l)-l)  -  '\0'; 
fgets (f ile_2, 20, info) ; 

file_2[strlen(file_2)-l]  -  '\0'; 

infile  ■  fopen(file_l,"r")  ; 
outfile  »  fopen{file_2,"w") ; 

arid  *  1; 
get_out->0; 
nxtrc  “  ' ? ' ; 

for  (stassid=l;  get_out!-l;  stassid^stassid+l ) 

{ 

for  (i*l;  (nxtrc II  get_out!=l);  i-i+1) 

{ 

fgets  (in__line,  100,  infile) ; 
slength  *  strlen(in_line)-l; 

strcpy  (tii?>2,iBid_str  (in_line,  slength,  1) )  ; 
nxtrc  *  tinp2[0]; 
if  (nxtrc**' 9' )  get_out*l; 
strcpy  (tinp2,mid__str  (in_line,  1, 1) ) ; 
thsrc  *  tnip2[0J; 

if  (i!-l) 

{ 

switch (thsrc) 

{ 

case  ' 2 ' : 
an^)  »  -1.0; 
per  •  -1.0; 

strcpy  (sta,  niid_str  (in_line,  10, 5) ) ; 
strcpy  (s_yr,  niid_str  (in_line,  2,4)); 
yr  -  atoi  (s_yr) ; 

strcpy  (s_ino,  mid_str  (in_line,  6,  2) ) ; 
mo  *  atoi (a_mo) ; 

strcpy (s_da,  mid_str (in_line, 8,2)); 
da  *  atoi(s_da); 

strcpy (s_hr,  mid_str (in_line, 39, 2) ) ; 
hr  *  atoi (s_hr) ; 

strcpy (s_mn,  mid_str (in_line, 41, 2) )  ; 
mn  =  atoi (s_mn) ; 

strcpy (s_sec,  mid_str (in_line, 43, 4) ) ; 
sec  *  atof (s_sec) ; 
sec  *  0.01*sec; 

jdate  =  (1000*yr)  +  doy(mo,  da,  yr); 

sprintf  (sjtime,  "%2d;%2d;%6.3f",  hr,  mn,  sec)  ; 

time  *  dtoepoch(  jdate)  +  timecon(s_time)  ; 

fmtn  *  *mid_str (in_line,38,l) ; 

qual  *  *mid_str (in_line, 24, 1 ) ; 

fmot  (fin,  fmtn) ; 
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strcpy (Iphase,  mid_str {in_line, 25, 8) ) ; 
aut  ■  *iBid_str  (in_line,  37,1); 
switch (aut) 

{ 

case 

strcpy (auth, "  ISC" ) ; 

break; 
case  'O' ; 

strcpy (auth, "  OPEPATOR" ) ; 

break; 
default  : 

strcpy (auth, "  ISC-FAISE" ) ; 

} 

break; 
case  ' 3 ' : 

strcpy  (s_anpl,  niid_str  (in_lln€, 7,  4) )  ; 

an?)l  =  0.001*atof  (sjanpl) ; 

strcpy  (s_aiip2,  inld_str  (in_line,  11, 2) )  ; 

aBtp2  *  atof  (s_antp2)  ; 

anqp  «>  powdO.O,  (anqpl+aiiqp2) ) ; 

strcpy (s_per,  nd.d_str (in_line, 15, 4) ) ; 

per  *  0.01*atof (s_per) ; 

break; 

case  ' 4 ' : 
anp  =  -1.0; 
per  -  -1.0; 
strcpy (fm,  " — ")  ; 

strcpy (Iphase,  mid_str (in_line, 4,8)); 
qual  *  *mid__str  (in_line,3,l) ; 
aut  =  *niid_str  (in_line,16,l)  ; 
switch (aut) 

{ 

case  ' I ' ; 

strcpy (auth, "  ISC" ) ; 

break; 
case  'O' : 

strcpy (auth, "  OPERATOR") ; 

break; 
default  : 

strcpy (auth, "  ISC-FAISE" ) ; 

} 

strcpy  (s_yr,  inld_str  (ln_llne,  17, 4) )  ; 
yr  =  atol (s_yr) ; 

strcpy (s_mo,  mld_str (ln_llne, 21, 2) ) ; 
mo  =  atol  (s_mo) ; 

strcpy (s_da,  mld_str (ln_llne, 23, 2) ) ; 
da  =  atol  (s_da)  ; 

strcpy (s_hr,  mld_str (ln_llne, 25, 2) ) ; 
hr  =  atol (s_hr) ; 

strcpy (s_mn,  mld_str (ln_llne, 27, 2) ) ; 
mn  =  atol  (s  mn) ; 
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strcpy (s_sec,  mid_str (in_line, 29, 4) ) ; 
sec  »  atof {s_sec) ; 
sec  *  0.01*sec; 

jdate  *  (1000*yr)  +  doy(mo,  da,  yr); 
sprintf (s_tiaie,  "%2d:%2d:%6.3f",  hr,  nm,  sec); 
time  -  dtoepoch(  jdate)  +  timecon(s_tiine)  ; 
breaJc; 

case  ’ 5 ' : 

strcpy  (s_aii?)l ,  mid_str  (in_llne,  7,4)); 

ainpl  =  0.001*atof  (s_aii5>l) ; 

strcpy  (s_aHqp2,  nd.d_str  (in_line,  11, 2) ) ; 

anip2  «  atof  (s_anp2) ; 

anqp  pow(10.0,  (an!pltainp2) ) ; 

strcpy  (s_per,  niid_str  (in_line,  15, 4) ) ; 

per  »  0.01*atof (s_per) ; 

break; 


switch (nxtrc) 

{ 

case  *3'; 

break; 
case  ' 5 ' ; 

break; 
case  ' 6 ' : 

break; 
default  : 

sprintf (outl,"%5s  %17.5f  %8d  %81d  %8d  %8d  %8s  %8s  %lc  ”, 
sta,  time,  arid,  jdate,  stassid,  CHANID,  CHAN,  ipliase, 
STYPE); 

sprintf (out2,"%6.3f  %7.2f  %7.2f  %7.2f  %7.2f  %7.2f  %7.3f  %10.1f", 
DELTIM,  AZIMUTH,  DELAZ,  SLOW,  DELSLO,  EMA,  RECT,  an^); 
sprintf (out 3,"  %7.2f  %7.2f  %lc  %2s  %10.2f  %lc  %15s  %8d  %17s", 
per,  LOGAT,  CLIP,  fra,  SNR,  qual,  auth,  COMMID,  Iddate)  ; 

sprintf (out_line, "%s%s%s\n",outl,out2,out3) ; 
fputs (out_line, outfile) ; 

arid  =  arid  +1; 

} 

} 

if  (nxtrc='l'  II  get_out— 1)  break; 

) 


fclose (infile) ;  fclose (outfile) ,  fclose (info) ; 
exit (0) ; 

} 
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♦include  <stdio.h> 

♦include  <string.h> 

♦include  <stdlib.h> 

♦include  <math.h> 

♦include  <float.h> 

♦include  "fjnot.c" 

♦include  "mid_str.c" 

♦include  "day.c" 

♦include  "Tiine_Subs .  c" 

♦define  COMMID  -1 

ch6u:  *mid_str (char  str[],  int  first,  int  length); 

med.n() 

{ 

FILE  *infile,  *outfile,  *info; 

char  in_line[100] ,  out_line[225] ,  outl(200],  out2[200],  out3[200]; 

char  tinp2[2] ; 

int  i,  slength; 

chcu:  nxtrc,  thsrc; 

char  file_l[21],  file_2[21]; 

int  get_out; 

int  arid,  orid; 

char  timedef,  azdef,  slcxief; 

char  sta[6],  phase[9],  vmodel[16]; 

float  belief,  delta,  seaz,  esaz,  timeres,  azres,  slores,  emares,  wgt; 
char  s_delta[9],  s_esaz[8],  s_timeres[9] ,  lddate[20); 

info  =  fopen("run_info", "r") ; 
fgets (Iddate, 20, info) ; 

Iddate [strlen (Iddate) -1]  *  '\0’; 
fgets (file_l, 20, info) ; 

file_l[ strlen (file_l)-l]  =  '\0'; 
fgets (f lle_2, 20, info) ; 

file_2[ strlen (file_2)-l]  =  '\0’; 

infile  =  fopen(file_l, "r") ; 
outfile  =  fopen(file_2, "w") ; 

arid  =  1; 
get_out=0; 
nxtrc  = 

for  {orid=l;  get_out!=l;  orid=orid+l) 

{ 

for  (i=l ;  (nxtrc ! = ' 1 '  | |  get_out ! =1 ) ;  i=i+l ) 

{ 

fgets (in_line, 100, infile) ; 
slength  =  strlen (in_line)-l; 
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strcpy  (tn5>2,nii<i_str  (in_line,  slength,  1) )  ; 
nxtrc  ”  tnip2[0]  ; 
if  (nictrc«=' 9' )  get_out=l; 
strcpy  (tii?>2,mici_str  (in_line,  1, 1) ) ; 
thsrc  = 

if  (i!=l) 

{ 

switch (thsrc) 

{ 

case  ' 2 ' ; 

strcpy  (sta,  mici_str  (in_line,  10, 5) )  ; 
strcpy (phase,  mid_str (in_line, 25, 8) ) ; 
belief  =  -1.0; 

strcpy (s_delta,  mid_str (in_line, 15, 5) ) ; 
delta  =  at of (s_delta) ; 
delta  =  0.01*delta; 
seaz  =  -999.0; 

strcpy (s_esaz,  mid_str (in_line, 20, 3) ) ; 
esaz  =  atof (s_esaz) ; 

strcpy (s_timeres,  mid_str (in_line, 33, 4) ) ; 

timeres  =  atof  (s_tiineres)  ; 

timeres  =  0.1*tiineres; 

timedef  = 

azres  =  -999.0; 

azdef  =  ' - ' ; 

slores  =  -99999.0; 

slodef  =  ' - ' ; 

emcures  =  -999.0; 

wgt  =  -1.0; 

strcpy (vmodel ,  ; 

break; 

case  ' 4 ' : 

strcpy  (phase,  niid_str  (in_llne,  4,  8) ) ; 
belief  =  -1.0; 

strcpy  (s_timeres,  niid_str  (in_line,  12,  4) ) ; 

timeres  =  atof (s_timeres) ; 

timeres  =  0.1*timeres; 

timedef  = 

breeOc; 


if  (thsrc= '  2 '  |  |  thsrc= '  4 ' ) 

{ 

sprintf (outl,"%8d  %8d  %5s  %8s  %4.1f  %8.3f  %7.2f  ", 

arid,  orid,  sta,  phase,  belief,  delta,  seaz); 
sprintf (out2,"%7.2f  %8.3f  %lc  %7.1f  %lc  %7.0f  %lc", 

esaz,  timeres,  timedef,  azres,  azdef,  slores,  slodef) ; 
sprintf (out3,"  %7.1f  %6.3f  %15s  %8d  %17s", 
emares,  wgt,  vmodel,  CC»4MID,  Iddate) ; 

sprintf (out_line, "%s%s%s\n",outl,out2,out3) ; 
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fputs (out_line, outf ile) ; 

arid  =  arid+1; 

} 

} 

if  (metre®*' 1'  II  get_out=l)  break; 
} 


f close (infile) ;  f close (outf ile) ,  f close (info) ; 
exit (0) ; 

} 
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finclude  <stdlo.h> 

# Include  <string.h> 
finclude  <stdlil:>.h> 

♦define  AUTH  "  ISC-FAISE" 

♦define  COMMID  -1 

mainO 

{ 

FILE  *infile,  *outfile,  *info; 

Chau:  lddate[20],  in_line[100] ,  out_linetlOO]  ; 
int  i,  j,  n,  evid,  prefer,  slength,  get_out; 

Chau:  nxtre,  there,  evnaanetlS]; 

Chau:  file_l[21],  file_2[211; 

info  “  fopen("run_i  o","r"); 
fgets (Iddate, 20, info) ; 

lddate[strlen(lddate)-l]  =  '\0'; 
fgets (file_l, 20, info) ; 

file_l[strlen(file_l)-l]  =  'NO'; 
fgets (file_2, 20, info) ; 

file_2[strlen(file_2)-l]  =  '\0'; 

infile  =  fopen(file_l,"r")  ; 
outfile  =  fopen(file_2,"w") ; 

n*0;  while  (nxtre ! » ' 9 ' ) 

{ 

n=*n+l; 

evid  =  n;  prefer  =  n; 

for  (i=l;  i<=100;  i++) 

{ 

fgets (in_line, 100,  infile) ; 
slength  =  strlen(in_line) -1; 
nxtre  =  ln_line[slength-l] / 
if  (nxtrc='9')  exit<0); 
there  «  in_line[0]; 

if  (i=l) 

{ 

for  (j=0;  j<=14;  j++)  evnaune[ j]=in_line[4+j] ;  evname[15]='\0'; 

sprintf (out_line, "%8d  %15s  %8d  %15s  %8d  %17s\n", 
evid,  evname,  prefer,  AUTH,  CC^^D,  Iddate) ; 
fputs (out_line, outfile) ; 

} 

if  (nxtrc='l')  break; 

} 

} 

fclose (infile) ;  fclose (outfile) ,  fclose (info) ; 
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exit  (0) ; 

} 
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flnclxide  <stdio.h> 

♦include  <string.h> 

♦include  <stdlib.h> 

♦Include  <inath.h> 

♦include  <float.h> 

♦include  <f_mot.c> 

♦include  <julian.c> 

♦include  <tiine_sec,c> 

♦Include  cmidstr.O 

♦define  AUTH  "  ISC-FAISE" 

♦define  COMOD  -l 

double  dtoepoch (long  date); 
double  timecon (Chau:  *timstr) ; 

char  *inid_str (char  str[],  int  first,  int  length); 
finot(char  £ai[],  chau:  fisitn) ; 

madnO 

{ 

FILE  *infile,  *outfile,  *info; 

char  in_linetlOO],  out_line(250] ,  outl(200],  out2[200],  out3[200]; 
char  tinp2[2] ; 
int  i,  slength; 
char  nxtrc,  thsrc; 

int  get_out; 

int  orid,  evid,  nass,  ndef,  nc^,  grn,  srn,  rabid,  msid,  ralid; 
char  s_nass[5],  s_ndef[5],  s_no^[5],  s_gm[9],  s_sm[8],  s_rabid[9], 
s_rasid[9],  s_nilid[9I; 
int  rao,  da,  hr,  ran; 

char  s_yr(5],  s_mo[3],  s_da[3],  s_hr[3],  s_ran[3]; 
chaur  dtype; 

char  lddate[20],  etype[8],  algorithm [1 6] ,  s_tirae[13]; 

float  lat.  Ion,  depth,  depc^,  mb,  ms,  ml,  sec; 

char  s_lat[8],  s_lon[9],  s_depth[5],  s_rab[3],  s_ms[3],  s_sec[5]; 

long  int  jdate,  yr; 

double  time; 

char  file_l[21],  file_2[21]; 

info  =  fopen("run_info", "r") ; 
fgets (Iddate, 20, info) ; 

lddate[strlen(lddate)-l]  =  ’\0'; 
fgets (f ile_l, 20, info) ; 

file_ltstrlen(file_l)-l]  =  '\0'; 
fgets (file_2, 20, info) ; 

file_2[strlen(file_2)-l]  =  '\0'; 

infile  =  fopen(file_l,"r") ; 
outfile  =  fopen(file_2, "w") ; 

get_out=0; 
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nxtrc  “  ' ? ' ; 

for  (orid-l;  get_out!=l;  oridHarid+l) 

{ 

evid  »  orid; 

for  ( i*l ;  (nxtrc  !■»'!'  II  get_out !  »1 ) ;  i“i+l ) 
{ 

fgets (in_line, 100, infile) ; 
slength  ■  strlen(in_line)-l; 

strcpy  (tnp2,mid_str  (in_line,  slength,  1) )  ; 
nxtrc  =  tnqp2t0]; 
if  (nxtrc—' 9')  get_out*l; 
strcpy  (tnp2,mid_str  (in_line,  1, 1) ) ; 
thsrc  =  tn5>2[0]; 

if  (i=l) 

{ 

strcpy  (s_lat,  inid_str  (in_line,  23, 7) )  ; 
lat  =  atof(s_lat); 
lat  =  O.OOOinat; 

strcpy (s_lon,  mid_str (in_line, 32, 8) ) ; 

Ion  *  atof (s_lon) ; 

Ion  ■  0.0001*lon; 

strcpy (s_depth,  mid_str (in_line, 42, 4) ) ; 

depth  ”  atof  (s__depth)  ; 

depth  «  0.1*depth; 

strcpy (s_yr,  mid_str (in_line, 5,4)); 

yr  *  atoi (s_yr) ; 

strcpy (s_nio,  mid_str  (in_line,  9,2)); 
mo  =  atoi (s_mo) ; 

strcpy (s_da,  iaid_str (in_line, 11,2) ) ; 
da  =  atoi(s_da); 

strcpy (s_hr,  mid_str (in_line, 13, 2) ) ; 
hr  «  atoi (s_hr) ; 

strcpy (s_mn,  mid_str (in_line, 15, 2) ) ; 
mn  -  atoi (s_mn) ; 

strcpy (s_sec,  mid_str (in_line, 17, 4) ) ; 
sec  *  atof (s_sec)  ; 
sec  *  0.01*sec; 

jdate  =  (1000*yr)  +  doy(mo,  da,  yr); 
sprintf (s_time,  "%2d:%2d:%6.3f",  hr,  mn,  sec) ; 
time  =  dtoepoch( jdate)  +  timecon(s_time) ; 
strcpy (s_nass,  mid_str (in_line, 58, 4) ) ; 
nass  =  atoi  (s_naiss) ; 
ndef  =  -1; 

Ti6p  “  -1; 
grn  =  -1; 
srn  *  -1; 

strcpy (etype,  ) ; 
depd^  ■  -999.0; 
dtype  - 

strcpy (s_mb,  mid_str (in_line, 48, 2) ) ; 
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nb  »  atof(sjnb); 
mb  *  O.l^nb; 
mbld  »  -1; 

strcpy (s_ms,  mid_str (in_line, 53, 2) ) ; 

ms  «  atof(s_ms); 

ms  »  0.1*ms; 

msid  »  -1; 

ml  -  -999.0; 

mlid  “  -1; 

strqpy  (algorithm,  "  "); 

sprintf (outl,"%9.4f  %9.4f  %9.4f  %17.5f  %8d  %8d  %81d  %4d" 
lat.  Ion,  depth,  time,  orid,  evid,  jdate,  nass); 
sprintf (out 2, "  %4d  %4d  %8d  %8d  %7s  %9.4f  %lc  %7.2f  %8d", 
ndef ,  ndp,  gm,  srn,  etype,  depdp,  dtype,  mb,  mbid) ; 
sprintf (out3, "  %7.2f  %8d  %7.2f  %8d  %15s  %15s  %8d  %17s", 
ms,  msid,  ml,  mild,  algorithm,  AUTH,  COtMID,  Iddate) 

sprintf (out_line,  "%s%s%s\n", outl, out2, out3) ; 
fputs  (out_line,outfile)  ; 

} 

if  (nxtro='l'  |  |  get_out==l)  break; 

} 

} 


fclose (infile) ;  fclose (outfile) ,  f close (inf o) ; 


APPENDK  E 
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£Riot(char  £n[],  char  fottn) 
{ 

switch  (fmtn) 


case 

'  +  •  ; 

fio[0] 

break; 

-  'c'; 

fm[ll 

1  1 

case 

fm[0] 

break: 

»  'd'; 

fm[l] 

s 

1  1 

case 

'1'  : 

fin[0] 

break; 

« 

fm[l] 

'u' 

case 

•2'  : 

fm[0] 

break; 

—  1  1 . 

♦  r 

fm[l] 

'r' 

case 

•A*  ; 

fm[0] 

break; 

m  •  c ' ; 

fmtl] 

* 

•u' 

case 

•B»  : 

fm[0] 

break; 

=  'c'; 

fm[l] 

•r' 

case 

•C  : 

fm[0] 

break; 

=  'C; 

fm[ll 

s 

•  c 

case 

•D'  : 

fm[0] 

break; 

=  'D' ; 

fm[l] 

— 

'D' 

case 

•J'  : 

fm[0] 

break; 

=  'd'; 

fm[ll 

— 

•u' 

case 

•K'  : 

fm[0] 

break; 

=  'd'; 

fm[l] 

•r' 

default  : 

fm[0] 

—  f  ^  f  • 

“  t 

1—1 

fm[2]  =  '\0'; 
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char  *mtd_str (char  str[],  int  first,  int  length) 

{ 

char  mid  [100] ; 
int  i,  f,  1; 

f  »  first-1; 

1  =  length-1; 

for  (i-0;  i<=l;  i=i+l)  niid[i]=str [f+i]  ; 
inid[length]  =  '  \  0 '  ; 

return  mid; 

} 
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